home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 50 / 050.d81 / craps boot (.txt) < prev    next >
Commodore BASIC  |  2022-08-26  |  2KB  |  36 lines
  1. 10 poke53265,0:poke53280,1:poke53281,1
  2. 20 printchr$(142)"[147]    [154][180][181][161][146][182][170][167] [150]loadstar presents[154][165][180][181][161][182][170][146]"
  3. 30 print"[153] [164]    [164]  [164][164][164][164][164]  [164][164][164][164][164]    [164][164][164][164][164]    [164][164][164]"
  4. 40 print"[206][206][165]  [206][206][165][206]    [206][165][206]    [206][205]  [206]    [206][180]  [206]  [206][205]"
  5. 50 print" [146][153] [180]   [146][153] [180]     [146][153][206]      [223][146][153] [205]      [146][153][206]  [169]   [223][146][153] [205]"
  6. 60 print" [146][153] [180]   [146][153] [180]   [146][153] [180]   [146][153] [180]  [223][223][146][153][206][180] [146][153] [180]    [169][146][169]";
  7. 70 print"[153][180]  [223][223][146][153][206][180] [146][153] [180]   [146][153] [180]   [146][153] [180]   [146][153] [180]    [146][153] [180] [146][153] [204][175]   ";
  8. 80 print" [146][153] [180]    [146][153] [180] [146][153] [180]   [146][153] [180]   [146][153] [180]   [146][153] [180]    [146][153] [180]";
  9. 90 print" [146][153][206] [206][180]   [146][153] [180]    [146][153] [180] [146][153] [180]   [146][153] [180]   [146][153] [180]   [146][153] [180]   ";
  10. 100 print" [146][153] [180]   [146][153][206]    [146][153] [180]    [146][153] [180] [146][153][206][205]   [146][153][206]    [146][153] [180]  ";
  11. 110 print" [146][153] [180]    [146][153] [180] [146][153] [180]     [146][153] [180]    [146][153] [180][223][223][146] [153][205][169][146][169]   [153][175]";
  12. 120 print" [146][153] [204][175]  [146][153] [204][175][175][175] [146][153][206]  [146][153] [204][175][175][175]  [146][153][206][205][164][164][164] [146][153][206]  [223][223][169][146][169]   ";
  13. 130 print"[153][206]  [146][153][206] [206][180] [146][153][206]   [169][146][169][153]   [146][153][206]   [206][180][223][223][146][153][206]  [169][146][169]"
  14. 140 print"  [223][169]         [146][153][206]      [146][169]        [146][153][206]  [223]   [146][169]"
  15. 150 print"   [153][164][164]    [164][164][164][164]      [164][164]    [164][164][164][164]      [164][164]     [153][206] [206][205]  [206]   [206][205]    [206] [206][205]";
  16. 160 print"  [206]   [206][205]    [206] [206][205]   [169]  [223][146][153] [205]     [223][146][153] [205]";
  17. 170 print"  [169]  [223][146][153] [205]     [223][146][153] [205]  [169]  [223][146][153] [205] [169][146][169][153][180] [223][223][146][153][206][180] [146][153] [180] ";
  18. 180 print"[223][223][146][153][206][180][169][146][169][153][180] [223][223][146][153][206][180] [146][153] [180] [223][223][146][153][206][180][169][146][169][153][180] [223][223][146][153][206] ";
  19. 190 print" [146][153] [180]   [146][153][206]  [146][153] [204][175][175] [146][153][206]  [146][153] [204][175][175] [146][153] [180] [146][153] [204][175][175] [146][153][206] ";
  20. 200 print" [146][153][206][205][164][164]    [146][153] [180]      [146][153][206]  [169][146][169]   [146][153][206]    [146][153] [180] [146][153][206]  [169][146][169]";
  21. 210 print"  [223][223][146][153][206] [206][205]   [146][153] [180]   [164]     [146][169][153][205]        [146][153] [180]    [146][169]    ";
  22. 220 print"[223]  [223][146][153] [205]  [146][153] [180]  [206][206][180] [146][153] [180][223][223][146][153] [205]  [146][153] [180]   [146][153] [180] [146][153] [180]";
  23. 230 print"      [164]  [223][223][146][153][206][165] [146][153][206][205][164][164] [146][153][206]  [146][153] [180] [223][223][146][153][206][180] [146][153] [180]   [146][153] [180]";
  24. 240 print" [146][153] [180]     [206][206][205][164][164] [146][153][206] [223][223][146][153][206] [169][146][169]   [146][153] [180]   [146][153] [180] [146][153] [180]   [146]";
  25. 250 print" [153][180] [146][153] [180]     [223][223][146][153][206] [169][146][169]   [223]  [146][169]    [146][153][206]    [146][153][206]  [146][153][206]   ";
  26. 260 print" [146][153][206]  [146][153][206]       [223]  [146][169]"
  27. 270 print"      [144](c) 1988   louis k. avanzi";:poke53265,27:forz=1to2500:next
  28. 280 print"       [150][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164]"
  29. 290 print"          instructions (y/n) ?   [146]";
  30. 300 getz$:ifz$=""then300
  31. 310 ifz$="y"thenx$="instructions" :goto320
  32. 311 ifz$="n"thenx$="video craps":goto320
  33. 312 goto300
  34. 320 poke53280,.:poke53281,.:poke198,5:print"[144][147]load"chr$(34)x$chr$(34)",8";
  35. 330 poke631,13:poke632,82:poke633,85:poke634,78:poke635,13:end
  36.